object Dlg_AddrProperty: TDlg_AddrProperty Left = 216 Top = 181 BorderStyle = bsDialog Caption = 'Address' ClientHeight = 392 ClientWidth = 584 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PC: TPageControl Left = 12 Top = 10 Width = 561 Height = 340 ActivePage = tsOffice HotTrack = True TabOrder = 0 object tsGeneral: TTabSheet Caption = 'General ' object ImgGeneral: TImage Left = 16 Top = 12 Width = 41 Height = 41 Transparent = True end object Bevel1: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object Label1: TLabel Left = 80 Top = 24 Width = 235 Height = 13 Caption = 'Input the person'#39's Name and E-Mail address here.' end object Label6: TLabel Left = 16 Top = 84 Width = 31 Height = 13 Caption = '&Name:' FocusControl = gnE_Name end object Label7: TLabel Left = 16 Top = 120 Width = 73 Height = 13 Caption = 'E-&Mail Address:' FocusControl = gnE_Email end object gnE_Name: TEdit Left = 128 Top = 80 Width = 173 Height = 21 TabOrder = 0 Text = 'gnE_Name' end object gnE_Email: TEdit Left = 128 Top = 115 Width = 277 Height = 21 TabOrder = 1 Text = 'gnE_Email' OnChange = gnE_EmailChange end object btnAdd: TButton Left = 424 Top = 112 Width = 105 Height = 25 Caption = '&Add' TabOrder = 2 OnClick = btnAddClick end object btnEdit: TButton Left = 424 Top = 152 Width = 105 Height = 25 Caption = '&Edit' TabOrder = 3 OnClick = btnEditClick end object btnRemove: TButton Left = 424 Top = 192 Width = 105 Height = 25 Caption = '&Remove' TabOrder = 4 OnClick = btnRemoveClick end object btnDefault: TButton Left = 424 Top = 232 Width = 105 Height = 25 Caption = '&Set default' TabOrder = 5 OnClick = btnDefaultClick end object gnL_Email: TZListBox Tag = 1 Left = 16 Top = 152 Width = 389 Height = 105 ItemHeight = 13 Style = lbOwnerDrawFixed TabOrder = 6 OnDblClick = gnL_EmailDblClick OnDrawItem = gnL_EmailDrawItem end end object tsPersonal: TTabSheet Caption = 'Personal ' object ImgPersonal: TImage Left = 16 Top = 12 Width = 41 Height = 41 Transparent = True end object Label2: TLabel Left = 80 Top = 24 Width = 210 Height = 13 Caption = 'Input the person'#39's Personal Information here.' end object Bevel2: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object lblMibil: TLabel Left = 16 Top = 78 Width = 68 Height = 13 Caption = '&Mobile Phone:' FocusControl = prE_Mobile end object lblPNum: TLabel Left = 16 Top = 121 Width = 71 Height = 13 Caption = '&Pager Number:' FocusControl = prE_PagerNum end object lblOICQ: TLabel Left = 16 Top = 163 Width = 29 Height = 13 Caption = '&OICQ:' FocusControl = prE_OICQ end object lblICQ: TLabel Left = 16 Top = 206 Width = 21 Height = 13 Caption = '&ICQ:' FocusControl = prE_ICQ end object lblHPage: TLabel Left = 16 Top = 249 Width = 56 Height = 13 Caption = '&HomePage:' FocusControl = prE_HomePage end object lblSex: TLabel Left = 289 Top = 80 Width = 21 Height = 13 Caption = '&Sex:' FocusControl = prCb_Sex end object lblBirthday: TLabel Left = 289 Top = 119 Width = 41 Height = 13 Caption = '&Birthday:' FocusControl = prBirthday end object lblInterest: TLabel Left = 289 Top = 163 Width = 38 Height = 13 Caption = 'I&nterest:' FocusControl = prM_Interest end object btnHomepage: TSpeedButton Left = 512 Top = 245 Width = 21 Height = 21 Hint = 'Go to this page.' Flat = True Layout = blGlyphRight Spacing = 0 OnClick = btnHomepageClick end object prE_Mobile: TEdit Left = 92 Top = 75 Width = 163 Height = 21 TabOrder = 0 Text = 'prE_Mobile' end object prE_PagerNum: TEdit Left = 92 Top = 117 Width = 163 Height = 21 TabOrder = 1 Text = 'prE_PagerNum' end object prE_OICQ: TEdit Left = 92 Top = 160 Width = 163 Height = 21 TabOrder = 2 Text = 'prE_OICQ' end object prE_ICQ: TEdit Left = 92 Top = 202 Width = 163 Height = 21 TabOrder = 3 Text = 'prE_ICQ' end object prE_HomePage: TEdit Left = 92 Top = 245 Width = 414 Height = 21 TabOrder = 7 Text = 'http://' end object prM_Interest: TMemo Left = 364 Top = 159 Width = 166 Height = 66 ScrollBars = ssVertical TabOrder = 5 end object prBirthday: TDateTimePicker Left = 364 Top = 117 Width = 166 Height = 21 CalAlignment = dtaLeft Date = 36524.447949768520000000 Time = 36524.447949768520000000 ShowCheckbox = True DateFormat = dfLong DateMode = dmComboBox Kind = dtkDate ParseInput = False TabOrder = 6 end object prCb_Sex: TComboBox Left = 364 Top = 75 Width = 166 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 4 Items.Strings = ( '' 'Male' 'Female') end end object tsFamily: TTabSheet Caption = 'Family ' object ImgFamily: TImage Left = 16 Top = 12 Width = 41 Height = 41 Transparent = True end object Label3: TLabel Left = 80 Top = 24 Width = 197 Height = 13 Caption = 'Input the person'#39's Home Information here.' end object Bevel3: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object lblCountry: TLabel Left = 16 Top = 78 Width = 39 Height = 13 Caption = '&Country:' FocusControl = fmE_Country end object lblProvince: TLabel Left = 16 Top = 121 Width = 45 Height = 13 Caption = '&Province:' FocusControl = fmE_Province end object lblCity: TLabel Left = 16 Top = 163 Width = 20 Height = 13 Caption = 'C&ity:' FocusControl = fmE_City end object lblPostCode: TLabel Left = 16 Top = 206 Width = 49 Height = 13 Caption = 'P&ostCode:' FocusControl = fmE_PostCode end object lblStreetAdd: TLabel Left = 16 Top = 249 Width = 69 Height = 13 Caption = '&StreetAddress:' FocusControl = fmE_StreetAddr end object lblTelephone1: TLabel Left = 289 Top = 80 Width = 60 Height = 13 Caption = '&Telephone1:' FocusControl = fmE_Telephone1 end object lblTelephone2: TLabel Left = 289 Top = 119 Width = 60 Height = 13 Caption = 'T&elephone2:' FocusControl = fmE_Telephone2 end object lblFax: TLabel Left = 289 Top = 163 Width = 20 Height = 13 Caption = '&Fax:' FocusControl = fmE_Fax end object fmE_Country: TEdit Left = 92 Top = 75 Width = 163 Height = 21 TabOrder = 0 Text = 'fmE_Country' end object fmE_Province: TEdit Left = 92 Top = 117 Width = 163 Height = 21 TabOrder = 1 Text = 'fmE_Province' end object fmE_City: TEdit Left = 92 Top = 160 Width = 163 Height = 21 TabOrder = 2 Text = 'fmE_City' end object fmE_PostCode: TEdit Left = 92 Top = 202 Width = 163 Height = 21 TabOrder = 3 Text = 'fmE_PostCode' end object fmE_StreetAddr: TEdit Left = 92 Top = 245 Width = 433 Height = 21 TabOrder = 4 Text = 'fmE_StreetAddr' end object fmE_Fax: TEdit Left = 361 Top = 160 Width = 163 Height = 21 TabOrder = 7 Text = 'fmE_Fax' end object fmE_Telephone2: TEdit Left = 361 Top = 118 Width = 163 Height = 21 TabOrder = 6 Text = 'fmE_Telephone2' end object fmE_Telephone1: TEdit Left = 361 Top = 75 Width = 163 Height = 21 TabOrder = 5 Text = 'fmE_Telephone1' end end object tsOffice: TTabSheet Caption = 'Office ' object ImgOffice: TImage Left = 16 Top = 12 Width = 41 Height = 41 Transparent = True end object Label4: TLabel Left = 80 Top = 24 Width = 197 Height = 13 Caption = 'Input the person'#39's Office Information here.' end object Bevel4: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object Label13: TLabel Left = 16 Top = 274 Width = 56 Height = 13 Caption = '&HomePage:' FocusControl = ofE_HomePage end object lblAddress: TLabel Left = 16 Top = 239 Width = 38 Height = 13 Caption = '&Address' FocusControl = ofE_Address end object btnOffice: TSpeedButton Tag = 1 Left = 502 Top = 274 Width = 21 Height = 21 Hint = 'Go to this page.' Flat = True Layout = blGlyphRight OnClick = btnOfficeClick end object Label9: TLabel Left = 16 Top = 109 Width = 39 Height = 13 Caption = 'C&ountry:' FocusControl = ofE_Country end object Label10: TLabel Left = 16 Top = 141 Width = 45 Height = 13 Caption = 'P&rovince:' FocusControl = ofE_Province end object Label11: TLabel Left = 16 Top = 174 Width = 20 Height = 13 Caption = 'C&ity:' FocusControl = ofE_City end object Label12: TLabel Left = 16 Top = 206 Width = 49 Height = 13 Caption = 'Po&stCode:' FocusControl = ofE_PostCode end object Label14: TLabel Left = 289 Top = 141 Width = 60 Height = 13 Caption = '&Telephone1:' FocusControl = ofE_Telephone1 end object Label16: TLabel Left = 289 Top = 206 Width = 20 Height = 13 Caption = '&Fax:' FocusControl = ofE_Fax end object lblTelephone: TLabel Left = 289 Top = 174 Width = 60 Height = 13 Caption = 'T&elephone2:' FocusControl = ofE_Telephone2 end object lblPosition: TLabel Left = 289 Top = 76 Width = 40 Height = 13 Caption = 'Positio&n:' FocusControl = ofE_Position end object lblDepartment: TLabel Left = 289 Top = 109 Width = 58 Height = 13 Caption = '&Department:' FocusControl = ofE_Department end object Label17: TLabel Left = 16 Top = 76 Width = 47 Height = 13 Caption = '&Company:' FocusControl = ofE_Company end object ofE_Country: TEdit Left = 92 Top = 108 Width = 163 Height = 21 TabOrder = 1 Text = 'ofE_Country' end object ofE_HomePage: TEdit Left = 92 Top = 274 Width = 406 Height = 21 TabOrder = 6 Text = 'http://' end object ofE_Province: TEdit Left = 92 Top = 141 Width = 163 Height = 21 TabOrder = 2 Text = 'ofE_Province' end object ofE_City: TEdit Left = 92 Top = 173 Width = 163 Height = 21 TabOrder = 3 Text = 'ofE_City' end object ofE_PostCode: TEdit Left = 92 Top = 206 Width = 163 Height = 21 TabOrder = 4 Text = 'ofE_PostCode' end object ofE_Fax: TEdit Left = 358 Top = 206 Width = 163 Height = 21 TabOrder = 11 Text = 'ofE_Fax' end object ofE_Telephone1: TEdit Left = 358 Top = 141 Width = 163 Height = 21 TabOrder = 9 Text = 'ofE_Telephone1' end object ofE_Telephone2: TEdit Left = 358 Top = 173 Width = 163 Height = 21 TabOrder = 10 Text = 'ofE_Telephone2' end object ofE_Position: TEdit Left = 358 Top = 75 Width = 163 Height = 21 TabOrder = 7 Text = 'ofE_Position' end object ofE_Department: TEdit Left = 358 Top = 108 Width = 163 Height = 21 TabOrder = 8 Text = 'ofE_Department' end object ofE_Address: TEdit Left = 92 Top = 239 Width = 429 Height = 21 TabOrder = 5 Text = 'ofE_Address' end object ofE_Company: TEdit Left = 92 Top = 75 Width = 163 Height = 21 TabOrder = 0 Text = 'ofE_Company' end end object tsInfo: TTabSheet Caption = 'Information' object ImgInfo: TImage Left = 16 Top = 12 Width = 41 Height = 41 Transparent = True end object Label5: TLabel Left = 80 Top = 24 Width = 134 Height = 13 Caption = 'Input Other information here.' end object Bevel5: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object lblMemo: TLabel Left = 20 Top = 72 Width = 32 Height = 13 Caption = '&Memo:' FocusControl = InM_info end object InM_info: TMemo Left = 22 Top = 96 Width = 508 Height = 202 ScrollBars = ssVertical TabOrder = 0 end end object tsKey: TTabSheet Caption = 'Public Key' TabVisible = False object Image1: TImage Left = 16 Top = 12 Width = 41 Height = 41 end object Label8: TLabel Left = 80 Top = 24 Width = 164 Height = 13 Caption = 'Input the person'#39's Public Key here.' end object Bevel6: TBevel Left = 12 Top = 60 Width = 521 Height = 2 end object Label15: TLabel Left = 20 Top = 72 Width = 53 Height = 13 Caption = 'Public &Key:' FocusControl = InM_info end object Memo1: TMemo Left = 22 Top = 96 Width = 508 Height = 202 ScrollBars = ssVertical TabOrder = 0 end end end object btnOK: TButton Left = 413 Top = 360 Width = 75 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 1 OnClick = BtnOkClick end object btnCancel: TButton Left = 496 Top = 360 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end object Language: TLanguage LangCenter = DM_Language.LangCenter ResStrings.Strings = ( '0010=Email Address' '0011=Please input a valid Email address:' '0012=The Email address you input is not a valid Email. Are you s' + 'ure that you want to add it?' '0013=The Email address you input is not a valid Email. Are you s' + 'ure that you want to modify it?' '0014=Name cannot be blank! Please fill it before you save the ad' + 'dress.' '0015=The last email address cannot be removed!') Left = 444 Top = 88 end object IL_AddressInfo: TImageList Height = 32 Width = 32 Left = 312 end end